home *** CD-ROM | disk | FTP | other *** search
/ MacFormat 1995 July / macformat-026.iso / mac / Interactive Arts / Interactive Arts '95 / -I-Sight / 00086.ls < prev    next >
Encoding:
Text File  |  1995-05-02  |  404 b   |  16 lines
  1. on mouseUp
  2.   global myMoveMouse
  3.   set the puppet of sprite 16 to 1
  4.   set the castNum of sprite 16 to the number of cast "Fwd button pressed"
  5.   updateStage()
  6.   startTimer()
  7.   repeat while the timer < 10
  8.     nothing()
  9.   end repeat
  10.   set the castNum of sprite 16 to the number of cast "Fwd button"
  11.   updateStage()
  12.   set the puppet of sprite 16 to 0
  13.   myMoveMouse(mSetMouseLoc, 320, 240)
  14.   go(marker(1))
  15. end
  16.